home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Grab Bag
/
Shareware Grab Bag.iso
/
007
/
advsys.arc
/
SAMPLE.ADV
< prev
Wrap
Text File
|
1986-01-16
|
4KB
|
117 lines
; SAMPLE.ADV
;
; This is a VERY simple sample adventure that uses the "BASIC.ADI" simple
; runtime support code. It isn't interesting to play, but does illustrate
; most of the features of the adventure authoring system. Try compiling
; it using the command:
;
; A>ADVCOM SAMPLE
;
; When the compile has finished, run the adventure using the command:
;
; A>ADVINT SAMPLE
;
; You should then see the initial welcome message and a description of
; your initial location. You can use the direction names to move from
; one location to the next (or the abreviations N,S,E,W). You should try
; manipulating objects using TAKE and DROP. You can manipulate more than
; one at a time by using the conjunction AND. You can also GIVE an object
; to another creature like the DOG or CAT. You can instruct another
; creature to perform an action like:
;
; CAT, GIVE THE DOG THE KEY
;
; You can also experiment with using adjectives to distinguish between
; objects (there is more than one KEY in this adventure).
(adventure sample 1)
(define welcome "Welcome to the sample adventure.\n")
@basic.adi
(actor adventurer
(noun me)
(property
initial-location livingroom))
(actor dog
(noun dog)
(adjective small)
(property
description "There is a small dog here."
short-description "a small dog"
initial-location kitchen))
(actor cat
(noun cat)
(property
description "There is a cat here."
short-description "a cat"
initial-location kitchen))
(location storage-room
(property
description "You are in a small storage room with many empty shelves.
The only exit is a door to the west."
short-description "You are in the storage room."
west hallway))
(location hallway
(property
description "You are in a long narrow hallway. There is a door to the
east into a small dark room. There are also exits on both
the north and south ends of the hall."
short-description "You are in the hallway."
east storage-room
north kitchen
south livingroom))
(location kitchen
(property
description "This is a rather dusty kitchen. There is a hallway to the
south and a pantry to the west."
short-description "You are in the kitchen."
south hallway
west pantry))
(location pantry
(property
description "This is the kitchen pantry. The kitchen is through a
doorway to the east."
short-description "You are in the pantry."
east kitchen))
(location livingroom
(property
description "This appears to be the livingroom. There is a hallway to
the north and a closet to the west."
short-description "You are in the livingroom"
north hallway
west closet))
(location closet
(property
description "This is the livingroom closet. The livingroom is through
a doorway to the east."
short-description "You are in the closet."
east livingroom))
(thing rusty-key
(noun key)
(adjective rusty)
(property
description "There is a rusty key here."
short-description "a rusty key"
initial-location storage-room))
(thing silver-key
(noun key)
(adjective small silver)
(property
description "There is a small silver key here."
short-description "a small silver key"
initial-location closet))